20 FORX=679 TO 746
30 READD:POKE X,D:T=T+D:NEXTX
100 DATA 32,133,101,173,255,11,48,5,173
110 DATA 119,2,240,243,133,210,165,210
120 DATA 201,90,240,12,201,88,240,22,160
130 DATA 0,140,255,11,76,84,105,173,4,139
140 DATA 201,0,240,8,141,234,2,169,0,141
150 DATA 4,139,76,84,105,173,4,139,201,0
160 DATA 208,6,173,234,2,141,4,139,76,84
170 DATA 105,1